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ABSTRACT 

The  Report  Generation  (REPGEN)  capability  comprises  a  set  of  pro¬ 
grams  designed  to  run  on  an  IBM  1410  computer  under  the  Air  Force  Inte¬ 
grated  Command  and  Control  System  (AFICCS).  The  primary  purpose  of 
REPGEN  is  to  provide  a  capability  for  producing  a  printed  report  from  a 
file  of  input  data  contained  on  punched  cards,  magnetic  tape  or  on  the  system 
disk.  This  document  contains  detailed  information  regarding  the  structure 
and  operation  of  the  REPGEN  programs,  including  table  descriptions,  core 
maps,  program  flow-charts  and  abstracts. 
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SECTION  I 


INTRODUCTION 


The  purpose  of  this  document  is  to  present  detailed  information 
regarding  the  structure  and  operation  of  the  various  programs  which 
comprise  the  REPGEN  capability.  It  is  assumed  that  the  reader  is 
familiar  with  the  contents  of  the  REPGEN  User's  Guide. 
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SECTION  II 


OVERVIEW 


The  Report  Generation  (REPGEN)  capability  comprises  a  set  of 
programs  designed  to  run  on  an  IBM  1410  computer  under  the  standard 
AFICCS  system.  The  primary  purpose  of  REPGEN  is  to  provide  a  capability 
for  producing  a  printed  report  from  a  file  of  input  data  contained  on 
punched  cards,  on  magnetic  tape  or  on  the  syttem  disk.  The  output  may 
be  optionally  on  magnetic  tape  or  cards.  The  output  format  is  con¬ 
trolled  by  use  of  a  quasi-English  language  of  limited  vocabulary. 

There  are  three  major  activities  required  in  order  to  move 
from  source  data  to  finished  report.  These  are: 

a.  Table  generation 

b.  File  generation 

c.  Report  production 

Figure  1  shows  the  basic  elements  involved  in  each  of  these  activities. 
TABLE  GENERATION 

Before  a  report  can  be  generated,  certain  basic  informa¬ 
tion  must  be  loaded  into  tables  and  placed  on  the  system  disk,  to 
be  available  for  File  generation  and  Report  production.  The  total 
REPGEN  capability  includes  a  number  of  support  programs  which  are 
used  to  perform  the  necessary  table  construction. 

LID  (Load  Input  Descriptors) 

The  input  to  LID  is  primarily  a  description  of  the  source 
data  which  will  be  used  to  make  up  the  serial  file  tape  (SF  tape) 
which  in  turn  will  be  the  input  to  the  output  phase  of  REPGEN.  The 
various  source  data  record  types  must  b£  identified,  and  the  data 
attributes  associated  with  each  record  type  must  be  defined  in  terms 
of  length,  position  within  the  record,  data  type,  etc. 

SAVER 


In  some  cases,  the  source  data  may  reside  on  the  AFICCS 
system  disk  in  parallel  file  form.  In  order  to  produce  a  serial 
file  tape  (SF  Tape)  which  can  be  used  by  REPGEN  output  programs,  a 
Query  Language  retrieval  must  be  performed  against  the  parallel  file. 
The  Query  Language  retrieval  statement  must  specify  GETTAC  as  the 
propess  director.  GETTAC  (a  variant  of  GETB)  outputs  the  retrieved 
data  on  an  SF  Tape. 
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Figure  1  .  Overview  of  the  Report  Generation  Process 
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SAVER's  primary  function  is  to  save  a  Query  Language 
retrieval  statement  so  that  it  may  be  called  up  for  execution  when 
required.  (SAVER  is  a  variant  of  SAVE.) 

LEGVAL  (Legitimate  Value  Loader) 


As  information  is  transferred  from  source  data  to  the 
serial  file  tape,  it  may  be  desirable  to  check  certain  attributes 
for  legality.  This  best  applies  to  attributes  which  can  legally 
take  on  one  of  a  limited  number  of  values. 

LEGVAL  produces  a  table  which  contains  all  of  the  allowable 
values  for  each  attribute  which  is  to  be  legality  checked. 

LOP  (Load  Output  Descriptors) 

A  quasi-English  language  of  limited  vocabulary  has 
been  implemented  to  give  the  user  the  capability  to  structure  a 
report.  Using  the  language  provided,  data  can  be  selected  from  the 
serial  file  tape,  arithmetically  manipulated ,  and  arranged  for 
presentation  on  a  printed  page.  (Output  may  optionally  be  to 
magnetic  tape  or  punched  cards.)  The  set  of  statements  which  direct 
this  activity  may  be  called  an  Output  Program. 

An  output  program  is  initially  processed  by  LOD,  which 
performs  syntax  checking,  and  then  eliminates  all  redundant  characters 
in  each  statement.  LOD  also  replaces  attribute  names  with  their 
length  and  position  on  the  serial  file  tape.  The  resulting  condensed 
output  program  is  placed  in  a  table  on  the  system  disk,  to  be 
available  for  later  execution. 

FILE  GENERATION 

The  purpose  of  the  file  generation  activity  is  to  produce 
a  serial  file  tape  containing  the  data  from  which  the  desired  report(^) 
will  be  generated.  The  source  data  from  which  the  serial  file  tape  is 
made  may  be  in  punched  cards,  on  magnetic  tape,  or  may  reside  on  the 
system  disk  in  parallel  file  form. 

When  the  source  data  is  in  cards  or  on  tape,  we  are 
said  to  be  operating  in  Mode  1;  when  the  source  data  is  a  parallel 
file  on  disk,  we  are  operating  in  Mode  2.  There  are  internal 
differences  in  the  operation  of  the  file  generation  program  (REPGEN) , 
depending  upon  the  mode  in  which  it  runs.  The  end  result,  however, 
is  essentially  the  same;  a  serial  file  tape  is  produced  which  contains 
the  data  to  be  used  in  generating  the  desired  report(s). 


4 


REPORT  PRODUCTION 


Once  the  required  tables  have  been  generated  and  a 
serial  file  tape  has  been  prepared,  we  are  ready  to  produce  a 
report.  This  is  accomplished  by  operating  what  is  called  the  Outpi t 
Phase . 


The  output  phase  can  proceed  as  a  continuation  of  a 
file  generation  run;  at  the  completion  of  file  generation  the 
computer  operator  is  given  the  option  to  terminate  or  to  continue 
with  the  output  phase. 

A  serial  file  tape  which  was  produced  by  a  previous 
run  can  be  used  to  generate  a  report  by  operating  the  output  phase 
via  the  Bypass  Mode.  In  this  mode,  file  generation  is  bypassed  and 
the  output  phase  is  immediately  started. 

During  the  output  phase,  the  condensed  output  program 
is  read  from  disk  and  the  statements  are  interpreted  and  executed 
to  produce  the  desired  output.  Up  to  nine  additional  copies  of  a 
printed  report  may  be  produced  automatically. 
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SECTION  III 


TABLES 


REPORT  DESCRIPTOR  TABLE 


Created  By: 
Purpose : 

Table  Size: 
Entry  Size: 
End  of  Table: 


LID 

Each  entry  in  this  table  identifies  by  name  and  number 
an  active  REPGEN  report. 

1  record  (expandable)  of  2800  characters. 

100  characters  per  entry,  recorded  in  Move  mode. 

A  record  mark  in  the  first  position  of  an  entry 
indicates  the  end  of  the  table. 


Entry  Description: 

Positions  Contents 


1-3 

4-15 

16 

17 

18-47 

48-49 

50-52 

53-68 

69 

70 

71 

72 

73 

74-76 

77-80 

81-84 

85-88 

89-92 

93-96 

97-100 


Report  Number 

Report  Title 

Input  Media 

Classification 

Header  Label 

Size  of  Header  Label 

Low  Order  Position  of  Header  Label 

B1  ank 

Card  Indicator 
Tape  Indicator 
Printer  Indicator 
Not  Used 

History  Indicator 

Save  Statement  Number 

Low  Order  Position  of  OEDT 

SDA  of  Selected  Output  Table 

SDA  of  Record  Descriptor  Table 

Number  Records  for  Record  Desc.  Table 

SDA  of  Output  Entry  Desc.  Table 

Number  Records  for  OEDT 
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RECORD  DESCRIPTOR  TABLE 


Created  By:  LID 

Purpose:  Each  entry  describes  a  particular  type  of  input  record 

which  may  be  encountered  during  generation  of  a  Serial 
File  Tape. 

Table  Size:  1  record  of  2800  characters  allocated  for  each  entry 

in  the  Report  Descriptor  Table. 


Entry  Size:  40  characters  per  entry,  recorded  in  Move  mode. 

End  of  Table:  A  record  mark  in  the  first  position  of  an  entry 
indicates  the  end  of  the  table. 

Entry  Description: 

Positions  Contents 


1-5 

Record  Type 

6-8 

Low  Order  Position  of  Record  Type 

9 

Length  of  Record  Type 

10 

Input  Media 

11-12 

Maximum  Number  Records  per  Entry 

13 

Number  of  Control  Attributes 

14 

Number  of  Sub-Control  Attributes 

15-17 

High  Order  Position  of  Remark  Text 

18-20 

Low  Order  Position  of  Remark  Text 

21-32 

Blank 

33-36 

SDA  of  Attribute  Desc  Table 

37-40 

Number  Records  for  Attribute  Desc 
Table 
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ATTRIBUTE  DESCRIPTOR  TABLE 


Created  By:  LID 

Purpose:  Each  Attribute  Descriptor  Table  describes  all  of  the 

attributes  associated  with  a  particular  record  type. 

Table  Size:  1  or  more  2800  character  records  (sufficient  to  describe 

all  attriubtes  pertaining  to  a  given  record  type). 


Entry  Size:  40  characters  per  entry,  recorded  in  Move  mode. 

End  of  Table:  A  record  mark  in  the  first  position  of  an  entry 
indicates  the  end  of  the  table. 

Entry  Description: 

Positions  Contents 


1-17 

Attribute  Name 

18-19 

Length  of  Attribute 

20-22 

Low  Order  Position  of  Attribute 

23 

Data  Class 

24 

Audit  Check  Indicator 

25 

Mandatory  Value  Indicator 

26-30 

Record  Type 

31 

Type  of  Attribute 

32-36 

B1  ank 

37-39 

Low  Order  Position  of  the  Attribute 
Value  in  the  Output  Entry  File 

40 

Not  Used 
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SELECTED  OUTPUT  TABLE  (SOT) 

N 

Created  By:  LID»  The  space  is  allocated  by  LID,  but  table  entries 

are  actually  loaded  by  LOD. 

Purpose:  Each  SOT  table  acts  as  a  directory  for  up  to  seven 

output  programs  which  may  be  associated  with  a  given 
report  number. 


Table  Size:  1  record  of  245  characters  (only  the  first  210  character^ 

are  actually  used)  is  allocated  for  each  entry  in  the 
Report  Descriptor  Table. 


Entry  Size:  30  characters  per  entry,  recorded  in  Move  mode. 


End  of  Table:  A  record  mark  in  the  first  position  of  an  entry  indicates 
the  end  of  the  table. 


Entry  Description: 

Positions 


Content  s 


1 

2-5 

6 

7-10 

11 

12-14 

15-16 

17-21 

22-26 

27 


28-30 


Entry  Indicator 

SDA  of  Condensed  Output  Format 
Statement  s 
Output  Media 

Output  Entry  Size  for  this  Report 
History  Tape  Indicator 
Highest  Statement  Number  for  this 
Output  Program 

Total  Output  Statements  Fitting  into 

Core  with  this  Format 

Cote  Origin  of  Output  Statements 

for  this  Output  Format 

Core  Origin  of  Input  Area  for  this 

Output  Format 

Usually  Blank.  Set  to  1  by  UPSTAT 
to  indicate  that  the  condensed 
statements  to  which  this  SOT  entry 
points  have  been  fully  condensed 
by  UPSTAT 
Blank 
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OUTPUT  ENTRY  DESCRIPTOR  TABLE  (OEDT) 


Created  By: 
Purpose : 

Table  Size: 
Entry  Size: 
End  of  Table: 


LID 

This  table  describes  the  format  of  the  records  on 
the  Serial  File  Tape. 

1  record  of  2800  characters. 

25  characters  per  entry,  written  in  Move  mode. 

A  record  mark  in  the  first  position  of  an  entry 
indicates  the  end  of  the  table. 


Entry  Description: 

Positions 


Content  s 


1-17 

18 

19-20 

21-23 

24-25 


Attribute  Name 

"Zero"  inserted  by  LID 

Length  of  Attribute 

Low  Order  Position  of  Attribute 

Blank  -  Not  Used 
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Figure  2.  Tables  Associated  with  One  Report  Descriptor  Table  Entry 
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Figure  3. 


LID  Input  and  Output,  Mode  1 
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LEGITIMATE  VALUE  ATTRIBUTE  NAME  TABLE 


Created  By:  LEGVAL 

Purpose:  This  table  contains  the  name  of  every  attribute  to 

be  checked  for  legality  during  file  generation,  and 
acts  as  a  directory  for  the  lists  of  legal  values. 


Table  Size:  10  records  of  245  characters  each. 


Entry  Size*  24  characters  per  entry,  recorded  in  Move  mode. 

End  of  Table:  A  record  mark  in  the  first  position  of  an  entry 
indicates  the  end  of  the  table. 


Entry  Description: 

Positions  Contents 

1-17  Attribute  Name 

18-21  SDA  of  Legitimate  Values  for  this 

Attribute, 

22  Number  of  records  assigned  to 

above  SDA. 

23-24  Maximum  length  of  attribute  value. 
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LEGITIMATE  VALUE  TABLE 


Created  By: 

LEGVAL 

Purpose : 

Each  Legitimate  Value  Table  contains  the  list  of  all 
allowable  values  for  one  particular  attribute. 

Table  Size: 

4  records  of  245  characters  each. 

Entry  Size: 

Variable.  The  entries  in  a  given  Legitimate  Value 
Table  are  as  long  as  the  maximum  length  of  that 
particular  attribute  value. 

End  of  Table: 

A  record  mark  in  the  first  position  of  an  entry 
indicates  the  end  of  the  table. 
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Figure  4.  LEGVAL  Input  and  Output 
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CONDENSED  OUTPUT  PROGRAM 


Created  By: 

LOD 

• 

Purpose: 

Each  table  contains  one  Output  Program,  processed 
and  condensed  by  LOD  and  available  for  execution. 

Table  Size: 

The  table  contains  one  245  character  record  for  each 
statement  of  the  Output  Program  (only  the  first  200 
characters  of  each  record  are  actually  available  for 
use)  . 

Entry  Size: 

Each  entry  (condensed  statement)  is  contained  in  a 

245  character  record  written  in  Move  mode. 

End  of  Table: 

Each  condensed  statement  is  assigned  within  an  SDA 
to  the  relative  record  corresponding  to  the  statement 
number.  Thus,  the  last  entry  in  the  table  is  contained 
in  the  relative  record  corresponding  to  the  highest 
statement  number  used  in  the  Output  Program. 

Entry  Description: 

See  program  description  of  LOD. 
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Figure  5.  LOD  Input  and  Output 


SAVED  STATEMENT  TABLE  DIRECTORY 


Created  By:  SAVER 


Purpose:  This  table  serves  as  a  directory  for  locating  the 

Query  Language  statements  which  have  been  stored  on 
the  system  disk  by  SAVER. 

Table  Size:  1  record  of  2800  characters  (only  the  first  2000  are 

used) . 


Entry  Size:  Each  entry  is  4  characters  in  length. 

End  of  Table:  The  end  of  the  table  is  indicated  by  the  500th  entry 
or  a  blank  entry,  whichever  occurs  first. 


Entry  Description: 

Each  entry  is  an  SDA  of  a  saved  Query  Language 
statement.  The  relative  position  of  the  entry  in  the 
table  corresponds  to  the  statement  number  previously 
assigned  to  the  saved  statement. 
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SAVED  STATEMENT  TABLE 


Created  By: 

SAVER 

Purpose: 

Query  Language  retrieval  statements  are  stored  on 
the  system  disk  for  subsequent  recall  and  execution. 

Table  Size: 

A  maximum  of  500  2800  character  records. 

Entry  Size: 

Each  saved  statement  is  contained  in  one  2800 
character  record. 

Entry  Description: 

See  program  description  for  SAVER. 
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Figure  6.  SAVER  Input  and  Output 
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I/O  COMMUNICATION  RECORD 


Created  By:  REPGEN  (or  by  RGPBYP  when  using  bypass  mode). 

Purpose:  This  record  contains  information  which  must  be  passed 

from  the  input  phase  to  the  output  phase. 

Table  Size  1  record  of  245  characters. 

Entry  Size:  1  entry  of  126  characters. 


Entry  Description: 

Positions 


Contents 


1-100 

101-117 

118-120 

121-123 

124 

125 

126 


Report  Descriptor  Table  entry  for 
report  being  processed. 

AS  OF  TIME  entered  on  console 
High  order  position  of  Remarks  text 
Low  order  position  of  Remarks  text 
Format  number  of  requested  Output 
Program 

Classification  code  of  requested 
report 

Number  of  additional  copies  requested 
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SECTION  IV 


OUTPUT  PHASE  COMMUNICATION  ZONE 


Name 

Loc 

Length 

Tag 

Meaning 

WAREA 

2500 

200 

High 

Area  from  which  a  condensed 
statement  is  executed. 

ENTIND 

2700 

1 

Low 

Indicator  for  entry  from  SOT  to 
be  used.  A  or  C  =»  active;  D  or  E 
or  0  =  inactive. 

ENDS DA 

2704 

4 

Low 

SDA  of  condensed  statements  for 
this  Output  Program. 

ENTMED 

2705 

1 

Low 

Output  device  for  this  Output 
Program.  C  =  card  punch,  T  =* 
tape ,  P  =  printer . 

ENTSIZ 

2709 

4 

Low 

Size  of  the  output  image  for  this 
Output  Program. 

ENTHIS 

2710 

1 

Low 

History  tape  indicator.  Y  =  yes, 

0  =  no . 

ENTHIH 

2713 

3 

Low 

Highest  statement  number  for  this 
condensed  Output  Program. 

ENTAMT 

2715 

2 

Low 

Number  of  condensed  statements 
that  can  fit  in  core  for  this 
Output  Program. 

ENTSTA 

2720 

5 

Low 

Core  Origin  of  the  condensed 
statements  for  this  Output  Program 

ENTINP 

2725 

5 

Low 

Core  origin  of  the  input  area 
for  this  Output  Program. 

ENTRY 

2729 

4 

Low 

The  low-order  character  of  the 

SOT  entry  in  use. 

SOT 

2730 

245 

High 

Selected  Output  Table  for  this 
report . 

OVFLOW 

2976 

2 

Low 

The  line  after  which  overflow 
is  to  occur. 

COUNTR 

2977 

51  x  17 

High 

The  50  Counters  available  to  an 
Output  Program,  plus  the 

REMAINDER  Counter  (Counter  0) . 

22 


Name 

Loc 

Length 

Tag 

Meaning 

ASFDAT 

3860 

17 

Low 

Location  where  AS  OF  TIME  from 
console  is  stored. 

DATE 

3877 

17 

Low 

Location  where  system  date  is 
stored  (referred  to  by  system 
attribute  name  TODAY) . 

CLASS 

3894 

17 

Low 

Report  classification. 

SWITCH 

3895 

10 

High 

The  9  Switches  available  to  an 
Output  Program. 

LNCTER 

3906 

2 

Low 

Line  counter. 

C0M1N0 

3909 

3 

Low 

The  statement  number  of  the 
first  level  statement  in  operation 

COM1PO 

3914 

5 

Low 

The  position  in  the  first  level 
statement  in  operation. 

COM1AC 

3915 

1 

Low 

First  level  active  indicator; 

]  =  active;  0  =  inactive. 

COM2 NO 

3918 

3 

Low 

The  statement  number  of  the 
second  level  statement  in 
operation . 

COM2PO 

3923 

5 

Low 

The  position  in  the  second  level 
phrase  in  operation. 

COM2AC 

3924 

1 

Low 

Second  level  active  indicator; 

1  «  active;  0  =  inactive. 

COMREP 

3927 

3 

Low 

The  statement  number  of  the  REPEAT 
statement  in  operation. 

COMSOR 

3932 

5 

Low 

The  core  origin  of  the  condensed 
statements . 

COMSNO 

3934 

2 

Low 

The  number  of  statements  in  core. 

COMIOR 

3939 

5 

Low 

The  core  origin  of  the  input  area. 

COMIEN 

3944 

5 

Low 

The  end  of  the  input  area  in  core. 

COMOOR 

3949 

5 

Low 

The  core  origin  of  the  output  area 
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Name 

Loc 

Length 

Tag 

Meaning 

COMOEN 

3954 

5 

Low 

The  end  of  the  output  area  in 
core . 

COMTES 

3955 

1 

Low 

The  result  of  the  last  IF  test; 

1  =  true;  0  =  false. 

COMPUN 

3956 

1 

Low 

The  punctuation  from  the  last 
phrase  passed. 

COMDON 

3957 

1 

Low 

Finished  indicator;  1  =  no  more 
input  data. 

COMSTK 

3958 

1 

Low 

The  stacker  into  which  the  next 
card  to  be  punched  will  be  placed 

COMQL 

3959 

1 

Low 

Query  Language  indicator. 

Non  blank  =  Query  Language. 

COMTYP 

3960 

1 

Low 

The  statement  type  of  the  last 
statement  operated . 

COMDR 

3961 

1 

Low 

Type  of  first-level  statement 
last  executed;  D  =  DO ;  R  =*  REPEAT 

COMOVF 

3962 

1 

Low 

Overflow  indicator. 

HILO 

3968 

6 

Low 

The  high  and  low  order  addresses 
of  remarks  data  on  remarks  card. 

COMNEW 

3969 

1 

Low 

Indicator  that  a  new  statement 
has  become  active. 

COPIES 

3970 

1 

Low 

Number  of  additional  copies  of 
the  report  requested. 

NEWPAG 

3971 

1 

Low 

Indicator  that  a  SKIP  TO  NEW  PAGE 
was  executed. 

SPACES 

3973 

2 

Low 

Number  of  blank  lines  printed  by 
the  last  SKIP  statement. 

WRTSCT 

3975 

2 

Low 

Not  used. 
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Figure  7.  REPGEN  Output  Phase  Core  Map 
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SECTION  V 


SYMBOLIC  DISK  ADDRESSES 


The  REPGEN  programs  make  frequent  use  of  the  system  disk.  All 
disk  references  are  made  through  the  use  of  DSKACC,  using  Symbolic  Disk 
Addresses  (SDA's).  Several  programs  in  REPGEN  use  the  system  allocation 
routine  DSKALL  to  dynamically  obtain  needed  SDA's.  However,  there  are 
a  number  of  SDA's  which  must  be  obtained  prior  to  installing  the  REPGEN 
capability.  These  SDA's  are  assembled  directly  into  some  of  the  REPGEN 
programs . 

Table  1  which  follows  describes  the  characteristics  of  the  disk 
areas  for  which  SDA's  must  be  obtained  prior  to  installing  REPGEN. 
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SECTION  VI 


REPGEN  flowcharts  and  abstracts 


6.1  LID 
Purpose 


LID  reads  a  deck  of  input  descriptor  cards  and  generates 
a  set  of  tables  which  are  required  by  subsequent  REPGEN  programs. 

Calling  Sequence 

Enter  LID  on  the  console  typewriter.  Return  will  always 

be  to  IDLOOP. 

Description 


There  are  four  acceptable  input  card  types  to  LID.  They 
are  the  Report  Descriptor  Card,  the  Record  Descriptor  Card,  the  Attri¬ 
bute  Descriptor  Card  and  the  END  Card. 

Report  Descriptor  Card  --  When  LID  reads  a  Report  Descriptor 
Card  it  does  the  following: 

a.  Checks  the  Report  Descriptor  Table  to  make  sure  there 
is  an  open  slot  or  that  this  is  not  a  duplicate  of  another  report  number. 

b.  If  the  input  medium  declared  on  this  card  is  not  disk, 
an  SDA  is  allocated  for  a  Record  Descriptor  Table. 

c.  An  SDA  is  allocated  for  an  SOT. 

d.  An  SDA  is  allocated  for  an  OEDT. 

Record  Descriptor  Card  --  When  LID  encounters  a  Record 
Descriptor  Card  it: 

a.  Allocates  an  SDA  for  an  Attribute  Descriptor  Table. 

Attribute  Descriptor  Card  --  An  Attribute  Descriptor 
Card  causes  LID  to: 

a.  Make  an  entry  in  the  current  Attribute  Descriptor 

Table. 

b.  Read  the  next  Attribute  Descriptor  Card  and  repeat 
the  process  until  all  attributes  for  this  record  type  have  been  treated. 

c.  Make  an  entry  in  the  Record  Descriptor  Table. 
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END  Card  (or  next  Report  Descriptor  Card)--  When  an  END 
Card  is  read,  LID  will: 

a.  Construct  an  Output  Entry  Descriptor  Table  (OEDT) 
to  describe  the  format  of  each  record  as  it  will  later  appear  on  the 
Serial  File  Tape. 

b.  Modify  each  Attribute  Descriptor  Table  entry  to 
include  data  identifying  the  attribute's  assigned  position  in  the  Serial 
File  Tape  records. 

c.  The  modified  Report  Descriptor  Table  (and  Record 
Descriptor  Table  if  input  is  not  disk)  is  written  onto  the  system  disk. 
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PRINT  MESSAGE 
“RECORD 
DESCRIPTOR 
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LEGVAL 


Purpose 


To  generate  a  disk  table  containing  all  allowable  values 
for  one  or  more  attributes.  This  table  is  to  be  used  during  the  file 
generation  process  which  creates  a  Serial  File  Tape  from  source  input 
da  t  a . 

Calling  Sequence 


Enter  LEGVAL  on  the  console  typewriter. 


Description 


Each  input  card  to  LEGVAL  contains  the  name  of  an  attribute 
and  one  of  the  allowable  values  for  that  attribute.  LEGVAL  checks  to 
see  if  that  attribute  name  has  been  previously  encountered.  If  not, 
the  name  is  added  to  a  list  of  attributes  which  are  to  be  legality 
checked.  After  the  name  has  been  added  to  the  name  list,  an  SDA  is 
allocated  to  be  used  for  storing  the  list  of  legal  values  pertaining 
to  the  attribute.  When  all  allowable  values  for  a  given  attribute  have 
been  read,  the  value  table  is  written  on  the  system  disk.  When  an  END 
card  is  read,  the  name  list  is  written  on  the  system  disk. 
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iDLOOP 


SAVER 


Purpose 


A  query  language  statement  containing  the  GETTAC  process 
director  and  report  number(s)  is  stored  on  disk  for  utilization  by  tin- 
query  portion  of  the  report  generation  program. 

Calling  Sequence 

From’ I/O  typewriter,  or  cards  with  sense  switch  B  on, 
starting  in  column  1. 

SAVER)6GETTAC^AAAA  1  1  1 AA  [BBB/BBB  1  1  1  ] 

XXX+XXX-F'  1  ’+XXX 


AA 1 1 1  =  qualifying  attributes 

BB 1 1 1  =  output  selector 

XXX  =  report  numbers  (maximum  of  10) 


Description 


The 

first  blank  entry 
accessed  from  the 
correctness,  such 


saved  statement  SDA  table  is  read  from  disk,  The 
is  located  and  noted.  The  statement  to  be  saved  is 
buffer  SDA  '0003'.  The  statement  is  scanned  for 
as  appearance  of  a  left  and  right  bracket  and  report 
numbers.  The  report  numbers  are  stored  in  a  small  table  area.  The 
output  selectors  are  stored  in  a  table  area  50  characters  to  each  entry 
The  report  descriptor  file  is  now  accessed.  Report  numbers  are  now 
matched  from  the  report  descriptor  file  with  those  of  the  saved  state¬ 
ment.  If  a  match  is  found  the  saved  statement  number  is  inserted  in 
the  appropriate  slot  of  the  report  descriptor  file.  The  output  entry 
descriptor  table  SDA  and  number  of  records  referenced  by  the  report 
descriptor  is  saved  in  a  table  area.  The  new  report  descriptor  is 
written  back  on  system  disk.  The  process  is  continued  until  all  report 
numbers  from  the  saved  statement  are  exhausted. 


The  output  selector  table  is  now  written  on  disk  at  the: 
SDA's  indicated  by  the  matching  reports  discovered.  Disk  space  is 
allocated  for  the  saved  statement  and  the  statement  is  saved  at  the 
SDA  allocated.  The  actual  SDA  for  the  statement  is  inserted  in  the  SDA 
statement  buffer  and  rewritten  on  the  system  disk.  The  program  will 
terminate  with  a  printout  of  the  statement  number  assigned  to  the 
1  SAVER  1  statement . 


50 


IB  -  26,249 


51 


TYPE  MESSAGE 
”  STATEMENT 
NNN  HAS  BEEN 
SAVED" 

Y  ,,J 

ADD  SDA  TO 
SAVED  STATE¬ 
MENT  DIREC¬ 
TORY 
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LOD 

Purpose 


LOD  processes  an  Output  Program,  checking  the  output 
format  statements  syntactically,  and  condensing  them  into  a  convenient 
form  for  interpretation  and  execution  by  the  output  phase  of  REPGEN. 

Calling  Sequence 

Enter  LOD  on  the  console  typewriter.  Return  will  be  to 

IDLOOP. 

Description 


The  Output  Descriptor  Card  is  read  and  Report  Descriptor 
Table  is  called  from  disk.  A  search  is  instituted  for  the  report 
indicated  on  the  Output  Descriptor  Card. 

When  the  report  is  found,  the  SOT  Table  for  this  report 
is  called  in  from  disk  and  updated  with  the  current  information  from 
the  Output  Descriptor  Card.  An  SDA  is  now  allocated  for  the  condensed 
output  format  statements. 

The  SOT  Table  is  now  put  back  on  disk  with  the  present 
run  recorded  as  in  error  status.  The  condensed  output  statement  SDA 
is  put  into  the  appropriate  DSKACC  call. 

The  LOD  statement  cards  are  read  in  next  and  are  condensed 
by  LOD.  Each  numbered  statement  is  allotted  a  complete  245  character 
record  within  the  assigned  SDA.  When  an  attribute  name  is  encountered 
during  processing  of  the  statement  cards,  an  Output  Entry  Descriptor 
Table  (OEDT  --  an  expandable  2800  character  record)  for  this  report  is 
brought  into  core  from  disk.  The  attribute  name  is  replaced  by  a  six 
digit  value  from  the  OEDT.  This  value  specifies  the  attribute  value 
length  and  its  relative  position  in  the  intermediate  tape  created  by 
the  first  phase  of  REPGEN. 

The  OEDT  usually  will  remain  in  core  throughout  the 
processing  of  the  present  statement  cards  except  when  an  additional 
segment  of  the  OEDT  has  to  be  called  in  from  disk.  On  the  next  refer¬ 
ence  to  the  OEDT  the  first  segment  of  the  table  will  be  brought  back 
into  core. 


When  the  final  statement  has  been  processed,  the  report 
descriptor  table  will  be  written  back  onto  disk,  after  being  submitted 
to  a  minor  update.  This  update  involves  putting  an  indicator  for 
output  media  into  the  table. 
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A  second  wind-up  operation  puts  the  updated  SOT  Table 
onto  disk.  A  successful  set  of  statements  get  an  "A"  or  "0"  in 
position  0  of  the  table.  Otherwise  an  "E"  is  left  in  the  table. 


Phrase  Types  and  Condensed  Form 

Type  1 


DO  XXX  1DXXX 
REPEAT  XXX  1RXXX 
GO  TO  XXX  1GXXX 
CONTINUE  XXX  1CXXX 


Type  2 


SET  OVERFLOW  AFTER  NN  2S0NN 

SET  SWITCH  N  2SSN 

SET  COUNTER  NN  LENGTH* PP  2SCNNPP 

SET  REMAINDER  LENGTH=NN  2SC00NN 

CLEAR  SWITCH  N  2CSN 

CLEAR  SWITCHES  2CS 

CLEAR  COUNTER  NN  2CCNN 

CLEAR  COUNTERS  2CC 

CLEAR  2 

Type  3 

SKIP  TO  A  NEW  PAGE  3E1 

SKIP  NN  3CNN 

STACKER  N  3SN 

WRITE  TAPE  MARK  3T 


Type  4 


END  LINE  40 

END  CARD  40 

END  HEADER  XXX  4HXXX 

END  TRAILER  XXX  4TXXX 

END  ENTRY  40 

NEXT  ENTRY  4 

END  1 

Type  5 

IF  OVERFLOW  50 

IF  FINISHED  5F 
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Type  5  (continued) 


IF  SWITCH  X 

N  <  „ 
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REPGEN 


Purpose 


REPGEN  is  operated  to  produce  a  Serial  File  Tape  from  a 
source  data  file  contained  on  cards,  magnetic  tape  or  on  the  system 
disk.  The  Serial  File  Tape  is  then  used  as  input  to  the  output  phase 
of  the  Report  Generation  capability. 

Calling  Sequence 

Enter  on  the  console  typewriter 

REPGENrr  r  f cn 

where  rrr  =  3-digit  report  number  (no  blanks) 

f  =  Format  number  of  the  Output  Program  to  be  executed. 

Must  be  1-7  or  blank. 

c  =  Classification  code:  U ,  C,  S  or  T  for  Unclassified, 
Confidential,  Secret  or  Top  Secret. 

n  =  Number  of  copies  of  printed  output.  Must  be  1-9  or  blank 

Final  return  will  be  made  to  IDLOOP. 

Description 


The  Report  Descriptor  Table  is  read  from  disk  and  the 
data  from  the  typewriter  call  is  stored  away.  If  no  report  number  was 
given  with  the  call,  the  PRTIND  routine  is  operated,  printing  an  index 
of  REPGEN  reports  followed  by  a  return  to  IDLOOP. 

If  the  report  number  was  not  blank,  the  requested  report 
is  located  in  the  Report  Descriptor  Table,  mount  messages  are  issued 
and  the  input  medium  is  checked. 

If  the  input  medium  is  disk  the  saved  Query  Language 
statement  number  is  taken  from  the  Report  Descriptor  Table  entry  and 
used  to  construct  a  dummy  call  to  REPEET.  REPEET  is  called  via  COPS; 
it  fetches  the  Query  Language  statement,  types  it  on  the  console  and 
passes  control  to  GETTAC.  GETTAC  executes  the  Query  Language  statement 
placing  the  retrieved  data  on  a  Serial  File  Tape.  The  option  is  now 
given  to  the  operator  to  enter  the  output  phase  or  to  terminate . 

If  the  input  medium  is  not  disk,  the  Record  Descriptor 
Table  is  brought  in  from  disk  and  a  source  data  record  (either  card 
or  tape)  is  read.  Entries  in  the  Record  Descriptor  Table  are  examined 
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against  the  input  record  until  the  record  type  is  identified,  at  which 
time  the  Attribute  Descriptor  Table  for  this  record  type  is  read  into 
core  . 


All  control  attributes  are  collected  into  a  control 
field  for  this  input  record.  Sub-control  attributes  are  collected 
into  a  sub-control  field. 

The  control  field  is  compared  with  the  previous  control 
field.  If  they  differ,  a  control  break  is  noted.  If  the  sub-control 
field  differs  from  the  previous  sub-control  field,  a  sub-control  break 
is  noted.  If  the  current  record  caused  no  control  or  sub-control  break, 
the  record  is  given  at  once  to  the  audit  routine. 

The  audit  routine  processes  each  attribute  of  the  input 
record  separately,  performing  left  or  right  justification  and  legality 
checks  as  required  or  specified.  Each  attribute,  after  it  is  audited, 
results  in  an  entry  in  the  DAWORK  Table.  The  entry  in  DAWORK  specifies 
the  location  of  the  attribute  in  the  input  area,  its  destination  in 
the  output  area,  and  its  length.  If  the  input  record  contained  sub¬ 
control  attributes,  a  similar  entry  is  made  in  the  DAW0R2  table.  After 
all  input  attributes  for  the  current  record  have  been  audited,  the 
DAWORK  table  is  used  to  move  the  audited  fields  from  the  input  area 
to  the  output  buffer.  The  next  input  record  is  then  read. 

At  the  point  where  control  and  sub-control  fields  were 
checked  with  previous  fields,  if  a  control  break  or  sub-control  break 
was  noted  the  current  contents  of  the  output  buffer  will  be  written 
on  the  Serial  File  Tape.  If  a  control  break  occurred,  the  entire 
output  image  is  then  cleared.  If  a  sub-control  break  occurred,  the 
DAW0R2  table  is  used  to  determine  those  fields  to  selectively  clear 
in  the  output  image.  After  the  output  image  is  cleared,  the  current 
input  record  is  given  to  the  audit  routine,  and  processing  continues 
as  described  before. 

When  the  input  data  file  has  been  fully  processed  and 
the  Serial  File  Tape  is  complete,  a  disk  record  called  the  I/O  Communi¬ 
cation  Record  is  written,  containing  the  current  Report  Descriptor 
Table  entry  and  various  typewriter  inputs  (e.g.,  Report  Classification 
Code,  Format  Number,  AS  OF  TIME)  to  be  passed  a  long  to  the  output  phase. 
The  operator  is  given  a  typewriter  option  to  cancel  or  to  continue  into 
the  output  phase.  If  the  output  phase  is  requested,  a  dummy  call  is 
set  up  to  RGPBYP.  Control  will  eventually  be  returned  from  the  output 
phase  to  REPGEN  which  will  exit  to  IDLOOP. 
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RGPBYP 


Purpose 


This  routine  issues  mount  messages  for  the  output  phase, 
completes  the  I/O  Communication  Record  and  calls  in  the  output  phase. 

Calling  Sequence 

If  called  internally  from  REPGEN,  the  dummy  typewriter 
call  which  is  constructed  is 


RGPBYP*** 


If  called  externally,  enter  on  the  console  typewriter 
RGPBYPrrr f cn 


where  rrr  -  3-digit  report  number  (no  blanks) 


f  =  Format  number  of  the  Output  Program  to  be  executed. 
Must  be  1-7  or  blank. 


c  -  Cla ssif ica t ion  code:  U,  C,  S  or  T  for  Unclassified, 
Confidential,  Secret  or  Top  Secret. 

n  =  Number  of  copies  of  printed  output.  Must  be  1-9  or  blank. 

Final  return  is  to  calling  program. 


Description 


If  RGPBYP  was  called  from  REPGEN,  the  I/O  Communication 
Record  is  read  back  from  disk.  If  RGPBYP  was  externally  called,  the 
AS  OF  TIME  is  requested,  and  an  I/O  Communication  Record  is  constructed. 


The  SOT  Table  for  the  requested  report  is  accessed  and 
used  to  determine  the  output  devices  required  and  the  mount  messages 
to  be  issued.  Requests  for  multiple  copies  are  ignored  if  the  output 
device  is  not  the  printer. 


After  the  mount  messages  are  issued,  the  I/O  Communi¬ 
cation  Record  is  completed  and  written  on  the  system  disk.  The  output 
program  RGPOUT  is  then  called  via  COPS.  After  return  is  made  from 
RGPOUT,  RGPBYP  will  exit  to  its  calling  program. 
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RGPOUT 


Purpose 


RGPOUT  acts  as  the  output  phase  supervisor,  controlling 
the  loading  and  execution  of  the  various  output  phase  programs. 

Calling  Sequence 

RGPOUT  is  called  internally  from  RGPBYP  as  follows; 

B  COPS 
DCW  'RGPOUT 


Description 


The  Read/Write  Tape  routine  RWTAPE,  the  CONSOLE  routine 
and  the  initial  Communication  Zone  are  all  assembled  with  RGPOUT,  and 
are  loaded  into  core  when  RGPOUT  is  loaded.  They  remain  in  core  through¬ 
out  the  output  phase. 

RGPOUT  calls  the  output  phase  ini t ia 1 iza t ion  routine 
ININT  into  core  and  executes  it.  Next  the  SOT  Table  entry  for  the 
output  program  to  be  executed  is  examined.  If  input  was  via  Query 
Language,  the  SOT  entry  is  checked  to  see  if  UPSTAT  has  been  executed 
for  this  output  program. 

If  input  was  via  Query  Language  and  UPSTAT  has  not  been 
executed,  UPSTAT  is  loaded  and  executed  to  complete  the  condensing  of 
the  output  program. 

The  appropriate  output  routine,  PRINTO,  CARDO  or  TAPEO, 
is  loaded  depending  upon  whether  the  output  device  is  the  printer,  the 
card  punch  or  magnetic  tape.  The  main  output  program  REALO  is  loaded 
and  executed  to  produce  the  desired  output. 

After  REALO  executes  the  output  program,  RGPOUT  checks 
to  see  if  any  more  formats  were  requested  for  this  report.  If  so, 
the  appropriate  output  program  is  loaded,  REALO  is  loaded,  and  the 
next  output  program  is  executed 

When  all  requested  output  programs  have  been  executed, 
RGPOUT  checks  to  see  if  extra  copies  of  printed  reports  were  requested. 

If  so,  the  extra  copies  tape  is  rewound  and  an  internal  call  to  PRTTAP 
is  set  up  and  executed  to  yield  the  necessary  printed  copies. 
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ININT 


Purpose 


Performs  initialization  for  the  output  phase  of  REPGEN. 
Calling  Sequence 

ININT  is  called  from  RGPOUT  by 
B  ININT 
(Normal  Return) 


Description 


ININT  reads  the  I/O  Communication  Record  from  disk. 

The  classification  code  is  checked  for  U,  C,  S  or  T  and  causes  the 
system  attribute  CLASS  to  be  set  to  Unclassified,  Confidential,  Secret 
or  Top  Secrete  Other  data  is  taken  from  the  I/O  Communication  Record 
and  entered  into  the  Communication  Zone.  The  SOT  Table  is  read  into 
the  Cotnxnunica'  ion  Zone*  If  only  one  specific  format  was  requested, 
all  other  entries  in  the  SOT  Table  are  set  to  blanks.  The  Communica¬ 
tion  Zone  is  written  on  the  disk  from  where  it  may  be  read  back  to 
re-initialize  it  between  execution  of  output  programs. 

Return  is  made  to  RGPOUT. 
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UPSTAT 


Purpose 


UPSTAT  is  called  by  RGPOUT  to  complete  the  condensing 
of  output  statements  which  LOD  could  not  completely  condense.  This 
only  occurs  in  the  case  where  the  Serial  File  Tape  Is  the  product  of 
a  Query  Language  retrieval  from  a  parallel  file  stored  on  system 
d  isk . 

Calling  Sequence 


UPSTAT  is  called  from  RGPOUT  by 

B  UPSTAT 
(Normal  Return) 


Description 


When  LOD  condenses  the  statements  of  an  output  pro¬ 
gram  which  uses  a  Query  Language  generated  Serial  File  Tape  as  input, 
the  statements  cannot  be  completely  condensed.  In  particular,  LOD 
does  not  know  the  length  or  position  in  the  Serial  File  Tape  records 
of  each  attribute.  LOD  does  know  the  order  in  which  the  attributes 
will  appear  on  the  Serial  File  Tape.  In  the  case  in  point,  LOD 
assigns  each  attribute  a  number  corresponding  to  its  relative  posi¬ 
tion  in  the  Serial  File  Tape  records,  and  substitutes  this  number 
for  each  occurrence  of  an  attribute  name  in  an  output  statement. 

When  UPSTAT  is  executed,  it  reads  the  first  record  of 
the  Serial  File  Tape  and  uses  it  to  construct  a  table.  The  table  so 
constructed  contains  the  length  and  relative  position  on  the  Serial 
File  Tape  of  each  attribute.  The  condensed  output  program  is  read 
from  disk,  and  the  attribute  numbers  are  now  replaced  with  length 
and  position  data  from  the  table.  The  fully  condensed  statements 
are  written  back  onto  disk,  the  ’’UPSTAT  executed”  indicator  is  set 
in  the  appropriate  SOT  entry,  and  return  is  made  to  RGPOUT. 
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PR INTO 


Purpose 


Print  a  line  on  the  printer  or  read  a  record  from 
the  Serial  File  Tape. 

Calling  Sequence 


PRINTO  is  entered  from  the  REA  ID  program.  If  a 
record  is  to  be  read  from  the  Serial  File  Tape,  the  call  is 


B  INPUT 

(Normal  return) 

If  the  output  image  is  to  be  printed,  the  call  is 

B  OUTPUT 

(Normal  return) 

Description 


If  entry  is  made  at  INPUT,  one  record  is  read  from 
the  Serial  File  Tape.  If  an  end-of-file  is  encountered,  the  indi¬ 
cator  COMDON  is  turned  on  in  the  Communications  Zone. 

If  entry  is  made  at  OUTPUT,  the  first  132  characters 
of  the  output  image  are  printed.  The  line  counter  is  incremented, 
and  if  it  exceeds  the  value  in  OVFLOW,  the  overflow  indicator  is 
turned  on . 


If  additional  copies  of  the  printed  report  were 
requested,  the  print  image  is  also  written  onto  the  extra  copies 
tape.  Three  characters  are  added  to  the  record  on  tape  to  indicate 
any  blank  lines  or  page  ejects  which  should  be  accomplished  before 
this  line  is  printed.  (This  spacing  information  will  be  interpreted 
by  the  PRTTAP  program  which  generates  additional  copies  of  the  printed 
report  from  the  extra  copies  tape.) 
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CARDO 


Purpose 


Punch  a  card  from  the  output  image  or  read  a  record  from 
the  Serial  File  Tape. 

Calling  Sequence 

CARDO  is  entered  from  the  REALO  program.  If  a  record  is 
to  be  read  from  the  Serial  File  Tape,  the  call  is 

B  INPUT 

(normal  return) 

If  a  card  is  to  be  punched,  the  call  is 

B  OUTPUT 

(normal  return) 


Description 


If  entry  is  made  at  INPUT,  one  record  is  read  from  the 
Serial  File  Tape.  If  an  end-of-file  is  encountered,  the  indicator 
COMDON  is  turned  on  in  the  Communications  Zone. 

If  entry  is  made  at  OUTPUT,  a  check  is  made  to  see  if  a 
history  tape  was  requested.  If  a  history  tape  was  requested,  the 
first  entry  at  OUTPUT  causes  the  history  tape  to  be  spaced  until  an 
end-of-file  is  detected,  and  then  positioned  so  that  records  may  be 
added  to  the  file.  The  output  image  is  then  written  on  the  history 
tape  . 


If  Sense  Switch  C  is  on,  the  output  image  is  printed. 

Next  the  stacker  select  character  is  acquired  from  the 
Communication  Zone,  and  the  first  80  characters  of  the  output  image 
are  punched  in  a  card. 
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TAPEO 


Purpose 


Write  an  output  image  onto  magnetic  tape,  write  a 
Header  record  on  magnetic  tape,  write  a  Trailer  record  on  magnetic 
tape  or  read  a  record  from  the  Serial  File  Tape. 

Calling  Sequence 

TAPEO  is  entered  from  the  REALO  program.  If  a  record 
is  to  be  read  from  the  Serial  File  Tape,  the  call  is 

B  INPUT 
(normal  return) 

If  the  output  image  is  to  be  written  on  tape,  the  call  is 

B  OUTPUT 
(normal  return) 

If  a  Header  is  to  be  written  on  tape,  the  call  is 

B  HEADER 
DCW  ' NNN' 

where  NNN  is  the  number  of  characters  of  the  output  image  to  be 
used  as  a  Header  record.  If  a  Trailer  record  is  to  be  written  on 
tape,  the  call  is 

B  TRAILER 
DCW  'NNN* 

where  NNN  is  the  number  of  characters  of  the  output  image  to  be 
used  as  a  Trailer  record. 

Description 


If  entry  is  made  at  INPUT,  one  record  is  read  from  the 
Serial  File  Tape.  If  an  end-of-file  is  encountered,  the  indicator 
COMDON  is  turned  on  in  the  Communication  Zone. 

If  entry  is  made  at  OUTPUT,  a  check  is  made  to  see  if 
a  history  tape  was  requested.  If  a  history  tape  was  requested,  the 
first  entry  at  OUTPUT  causes  the  history  tape  to  be  Spaced  until  an 
end-of^file  is  detected,  and  then  positioned  so  that  records  may  be 
added  to  the  file.  The  output  image  (up  to  1000  characters)  is 
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then  written  on  the  history  tape.  If  Sense  Switch  C  is  on,  the  first 
132  characters  of  the  output  image  are  printed.  The  output  image  is 
then  written  on  the  output  tape. 

If  entry  is  made  at  HEADER,  the  Header  indicator  is 
turned  on,  the  first  NNN  characters  of  the  output  image  are  written 
on  the  output  tape,  and  are  also  saved  on  the  system  disk  (if  a 
subsequent  entry  at  OUTPUT  results  in  an  end-of-reel  condition 
on  the  output  tape,  the  saved  Header  will  be  written  as  the  first 
record  of  the  next  reel). 

If  entry  is  made  at  TRAILER,  the  first  NNN  characters 
of  the  output  image  are  written  on  the  output  tape. 
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REALO 


Purpose 

Interpret ively  execute  an  output  program  to  produce 
the  desired  report. 

Calling  Sequence 

REALO  is  called  internally  from  RGPOLT  by 

B  CTL 
(normal  return) 


Description 


An  initialize  routine  is  first  executed  to  read  into 
core  as  much  of  the  condensed  output  program  as  will  fit.  Statements 
are  kept  in  core  just  as  they  appeared  on  disk,  in  245  character 
records.  Each  statement,  as  it  is  required,  is  moved  to  a  buffer 
at  WAREA  from  where  it  is  actually  executed.  The  current  statement 
is  examined  one  phrase  at  a  time.  Each  phrase  begins  with  a  number 
from  1  to  6  indicating  the  phrase  type.  Recognition  of  the  type 
causes  a  transfer  to  the  appropriate  TYPE  routine,  where  the  phrase 
is  completely  identified  and  executed.  Section  6.4.4  under  LOD  shows 
the  phrases  grouped  by  type,  and  the  format  of  the  condensed  phrases. 
Execution  of  an  END  phrase  causes  control  to  be  passed  from  REALO 
back  to  RGPOUT . 
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FIELD  IN 
OUTPUT  AREA 


POINT  T6MHIH 
TO  HIGH  ORDER 
POS.  OF 

MOVE  T6MVEI 

TO  T6ML0W 
(LOW- ORDER  POS. 

POINT  T6MHIH 
TO  HIGH  ORDER 
POS  OF 

RESULT  FIELD 

OF  RESULT  FIELD) 

result 

FIELD 
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POINT  XRI  TO  LOW 
ORDER  POSITION 
OF  SAME  FIELD 
IN  PREVIOUS  PRINT 
IMAGE 


COMPARE  CURRENT 
RESULT  FIELD 
WITH  SAME  FIELD 
IN  LAST  PRINT 
IMAGE 


MOVE  CURRENT 
FIELD  TO 
EQUIVALENT 
POSITION  IN 
PREVIOUS 
IMAGE  AREA 


MOVE  RESULT 
FIELD  TO 
OUTPUT  AREA 


T6RJUS 

RIGHT  JUSTIFY' 
OUTPUT 
FIELD 


/  T6LJUS  \ 

/LEFT  JUSTIFYV 
\  OUTPUT  / 


FIELD  / 
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REMARK 


Purpose 

Print  or  punch  remarks  which  were  stored  on  disk  during 
the  input  phase  of  a  REPGEN  run. 

Calling  Sequence 

REMARK  is  loaded  and  called  from  RGPOUT  by 

B  REMARK 
(normal  return) 


Description 


During  the  input  or  file  generation  phase  of  REPGEN, 
any  input  records  defined  as  remarks  are  put  into  a  remarks  area  on 
the  system  disk.  Remarks  normally  would  be  punched  into  cards,  and 
a  given  remark  may  not  exceed  five  cards  in  length. 

If  the  output  medium  is  punched  cards,  the  REMARK 
processor  simply  reads  back  the  remarks  stored  on  disk  and  punches 
them  into  cards. 

If  the  output  medium  is  the  printer,  REMARK  prints  a 
heading  and  reads  a  remark  from  the  disk.  The  remark  is  packed  into 
a  print  line  and  printed.  If  it  overflows  to  more  than  one  line, 
subsequent  lines  are  indented  ten  spaces  until  the  entire  remark  is 
printed.  The  printer  is  spaced  once,  the  next  remark  is  read  and 
the  process  is  repeated  until  all  remarks  have  been  printed. 


The  REMARK  routine  is  called  and  executed  after  REALO 
has  finished  executing  an  output  program. 
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REPEET 


Purpose 

A  stored  query  GETTAC  statement  is  retrieved,  expanded 

and  executed. 

Calling  Sequence 

REPEET  is  called  internally  by  REPGEN.  The  call  is 
placed  in  SDA  0003  as 


REPEET tfNNN 

where  NNN  is  the  saved  statement  number  assigned  by  SAVER.  REPGEN 
then  issues  a 


B  COPS 
DCW  1 REPEET ' 

REPEET  may  be  called  externally  by  typing 
REPEET  l5»  NNN 

on  the  console  typewriter. 

Description 


The  statement  number  is  validity  checked.  The  saved 
statement  SDA  table  is  read  in  from  disk  and  the  SDA  corresponding 
to  the  given  statement  number  is  extracted.  The  saved  statement 
is  read  into  core  from  disk.  The  statement  is  scanned  for  record 
marks.  Each  record  mark  is  labeled  by  a  record  mark  number.  The 
statement  is  then  typed  out  and  data  insertions  are  made  via  typewriter 
for  each  record  mark  in  the  statement.  The  edited  statement  is 
written  to  the  system  communication  area  and  the  GETTAC  processor 
is  called  via  COPS. 
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REKALL 


Purpose 

Print  out  all  statxnents  previously  stored  on  disk  by 
the  program  SAVER. 

Calling  Sequence 

Enter  REKALL  on  the  console  typewriter.  Return  will 

be  to  IDLOOP. 

Description 


REKALL  reads  the  saved  statement  SDA  table  into  core. 
Each  non-blank  entry  points  to  a  saved  statement.  Each  saved  state¬ 
ment  is  read  in  turn  from  the  disk  and  is  printed  along  with  its 
assigned  statement  number.  A  total  of  500  statements  may  be  saved. 
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DELEET 


Purpose 

Delete  from  the  system  disk  a  Query  Language  statement 
previously  stored  there  by  the  SAVER  program. 

Calling  Sequence 

Enter  on  the  console  typewriter 
DELEETtfNNN 

where  NNN  is  the  saved  statement  number  assigned  by  SAVER. 

Description 

The  DELEETlSNNN  message  is  retrieved  from  SDA  0003. 

The  3  character  number  referencing  the  statement  to  be  deleted  is 
stored.  The  table  of  4  character  SDA1  s  which  references  where  each 
saved  statement  is  stored  is  read  into  core.  The  first  entry  in  the 
table  references  statement  number  001,  the  second  entry  references 
statement  number  002,  and  so  on.  Blank  entries  indicate  that 
statement  number  has  not  been  saved  and  is  available.  The  statement 
SDA  to  be  deleted  is  then  located.  If  it  is  blank,  a  message  will 
be  printed  on  the  console  indicating  that  this  statement  cannot  be 
deleted  because  it  has  not  been  saved.  If  an  SDA  is  found  in  the 
table  entry  corresponding  to  the  statement  number  to  be  deleted, 
the  saved  statement  is  typed  out  on  the  I/O  typewriter  for  the 
operator's  approval.  If  okay,  the  SDA  is  deleted  from  the  statement 
table  and  also  deallocated  so  that  the  statement  itself  is  effectively 
deleted.  The  new  SDA  statement  table  is  now  rewritten  on  the  disk 
and  the  program  returns  to  IDLOOP. 


I 
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PRTCRD 


Purpose 

PRTCRD  is  used  to  print  a  report  from  cards  which  were 
generated  by  RPTCRD. 

Calling  Sequence 


Enter  PRTCRD  on  the  console  typewriter.  Return  will 

be  to  IDLOOP. 


Description 

The  print  area  is  cleared,  the  printer  is  spaced  to  a 
new  page,  and  a  card  is  read. 

Each  input  card  contains  half  of  a  print  image  in 
columns  1-66.  Columns  77-80  contain  information  identifying  which 
half  of  the  print  image  the  card  represents  and  any  page  or  line 


spacing  to  be  done  before  printing, 
as  follows: 

Column  77  s  L  or 
R 

Columns -78-79  =  nn 

Column  80  =  J5 

1 

* 


Columns  77-80  are  interpreted 

;  This  is  left  half  of  print  image. 

;  This  is  right  half  of  print  image. 

;  Number  of  times  to  space  before 
printing. 

Blank  specifies  single  spacing. 

;  Print  after  putting  this  card 
in  buffer  and  performing  required 
spacing. 

;  Same  as  #,  except  skip  to  new 
page  first. 

;  Put  this  card  in  buffer  but  do 
not  print  or  space. 


As  each  card  is  read,  columns  1-66  are  placed  into 
the  left  or  right  half  of  a  print  image.  If  column  80  is  a  blank 
or  1,  required  spacing  is  performed  and  a  line  is  printed.  If 
column  80  is  *,  no  printing  or  spacing  is  done,  and  the  next  card 
is  immediately  read. 
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PRTTAP 


Purpose 

PRTTAP  is  used  to  print  additional  copies  of  a  report 
from  a  REPGEN  extra-copies  tape. 

Calling  Sequence 

PRTTAP  is  called  internally  from  RGPOUT.  RGPOUT  puts 
PRTTAPn 

where  n  is  the  number  of  copies  desired,  into  SDA  0003  and  then 
call  s 

B  COPS 
DCW *  1  PRTTAP1 

The  program  can  also  be  called  externally  by  entering 
PRTTAPn 

on  the  console  typewriter.  Return  will  be  to  IDLOOP. 

Description 


The  input  to  PRTTAP  is  tape  4,  with  one  file  of  135 
character  records  written  in  even  parity.  The  first  132  characters 
of  each  record  represent  a  print  image.  The  last  three  characters 
of  each  record  contain  information  regarding  page  and  line  spacing 
to  be  accomplished  before  printing  the  image. 

The  format  of  each  record  is  as  follows: 

Character  1-132  **  Print  image. 

133-134  53  Number  of  times  to  space  before 
printing. 

Blank  specifies  single  spacing 
135  =  Page  control. 

1  means  skip  to  new  page  before 
printing;  blank  means  do  not  skip. 

PRTTAP  reads  a  record  and  first  examines  the  page 
control  character.  If  it  is  a  1,  a  skip  to  channel  1  is  executed. 
Next,  if  any  spacing  is  indicated  it  is  accomplished  by  printing  the 
appropriate  number  of  blank  lines.  The  line  is  then  printed.  When 
an  end-of-file  is  encountered,  the  tape  is  rewound,  and  the  number 
of  copies  is  decremented  by  one.  If  it  is  not  blank,  another  run 
is  made  through  the  tape. 
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RPTCRD 


Purpose 


RPTCRD  is  used  to  punch  cards  from  a  REPGEN  extra¬ 
copies  tape  in  a  format  which  will  allow  the  cards  to  be  processed 
by  PRTCRD. 

Calling  Sequence 

Enter  RPTCRD  on  the  console  typewriter.  Return  will 

be  to  IDLOOP. 

Description 


Input  to  RPTCRD  is  tape  4,  with  one  file  of  135 
character  records  written  in  even  parity. 

Each  input  record  from  tape  4  is  treated  as  a  print 
line,  where  the  first  132  characters  constitute  a  print  image,  and 
the  last  three  characters  are  for  carriage  control.  (See  write-up 
of  PRTTAP  for  discussion  of  the  carriage  control  characters.) 

RPTCRD  will  divide  each  print  image  into  a  left  and 
right  half,  and  punch  each  half  into  the  first  66  columns  of  a  card 
using  columns  77-80  of  the  cards  for  carriage  control  information. 
These  cards  are  in  proper  format  to  be  processed  by  PRTCRD,  which  will 
use  these  cards  to  generate  a  report  on  the  printer.  If  Sense 
Switch  C  is  on,  each  card  will  be  printed  as  well  as  punched. 

The  format  of  the  output  cards  and  the  meaning  of  the 
data  entered  in  columns  77-80  is  the  same  as  that  which  was  presented 
in  section  6.18.3  to  describe  the  input  cards  to  PRTCRD. 

When  an  end-of-file  is  encountered  on  tape  4,  two  blank 
cards  are  punched  and  control  returns  to  IDLOOP. 
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